home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 5 (Internal Edition) / Apple R&P Lib Internal v5.0.iso / 6-Developer Demos / Developer Demos-Ed. / Macintosh School® CD-ROM Demo / Macintosh SchoolÆ CD-ROM Demo / card_10154.txt < prev    next >
Text File  |  1990-08-14  |  8KB  |  283 lines
  1. -- card: 10154 from stack: in
  2. -- bmap block id: 10888
  3. -- flags: 4000
  4. -- background id: 4754
  5. -- name: Report Cards
  6. ----- HyperTalk script -----
  7. on rollingDemo
  8.   answer "Report Cards demo will take approx. 6 min." with "Cancel" or "OK"
  9.   if it is "Cancel" then exit rollingDemo
  10.   set the cursor to none
  11.   lock screen
  12.   go to card "Rolling Demo Instructions" of this background
  13.   unlock screen with dissolve fast
  14.   repeat until the mouseClick
  15.   end repeat
  16.   set the cursor to hand
  17.   autoMouse moveMouse,420,60
  18.   click at the loc of bg button id 7
  19.   showInfo "Introduction",false
  20.   wait 1 second
  21.   set the cursor to hand
  22.   autoMouse menuMouse,4,1 -- By Class
  23.   if the result is "Item not found" then -- test for XCMD bug
  24.     send "doMenu By Class" to background "Report Cards"
  25.   end if
  26.   wait 1 second
  27.   autoMouse moveMouse,148,126
  28.   click at the loc of background button id 8
  29.   wait 30
  30.   autoMouse menuMouse,2,1 -- Open
  31.   if the result is "Item not found" then -- test for XCMD bug
  32.     send "doMenu Open" to background "Report Cards Classes"
  33.   end if
  34.   showInfo "Class Rosters",true
  35.   wait 30
  36.   set the cursor to hand
  37.   autoMouse moveMouse,21,55
  38.   click at the loc of card button "Close"
  39.   showInfo "Sort Order",false
  40.   wait 30
  41.   set the cursor to hand
  42.   autoMouse menuMouse,4,7 -- Sort Order
  43.   wait 1 second
  44.   autoMouse moveMouse,313,141
  45.   wait 30
  46.   autoMouse moveMouse,200,123
  47.   set the loc of card button "Grade" to 199,123
  48.   wait 1 second
  49.   autoMouse moveMouse,175,217
  50.   click at the loc of card button "OK"
  51.   wait 30
  52.   autoMouse menuMouse,4,2 -- By Student
  53.   showInfo "Sort Order",false
  54.   wait 30
  55.   set the cursor to hand
  56.   autoMouse menuMouse,4,7 -- Sort Order
  57.   wait 1 second
  58.   autoMouse moveMouse,175,289
  59.   click at the loc of card button "OK"
  60.   wait 30
  61.   autoMouse moveMouse,182,144
  62.   click at the loc of background button id 11
  63.   wait 30
  64.   autoMouse menuMouse,2,1 -- Open
  65.   if the result is "Item not found" then -- test for XCMD bug
  66.     send "doMenu Open" to background "Report Cards"
  67.   end if
  68.   wait 3 seconds
  69.   autoMouse moveMouse,21,55
  70.   click at the loc of card button "Close"
  71.   wait 30
  72.   autoMouse menuMouse,3,9 -- Term Information‚Ķ
  73.   showInfo "Term Information",true
  74.   wait 30
  75.   set the cursor to hand
  76.   autoMouse moveMouse,425,49
  77.   click at the loc of card button id 11
  78.   showInfo "Comments",true
  79.   wait 30
  80.   set the cursor to hand
  81.   autoMouse moveMouse,432,314
  82.   click at the loc of card button "Comments‚Ķ"
  83.   wait 30
  84.   autoMouse moveMouse,198,110
  85.   click at the loc of card button id 7
  86.   wait 30
  87.   autoMouse moveMouse,376,194
  88.   click at the loc of card button "Open"
  89.   wait 1 second
  90.   autoMouse moveMouse,477,286
  91.   click at the loc of card button "Scroll Down"
  92.   wait 1 second
  93.   click at the loc of card button "Scroll Down"
  94.   showInfo "Report Card 1",true
  95.   wait 30
  96.   set the cursor to hand
  97.   autoMouse moveMouse,75,313
  98.   click at the loc of card button "OK"
  99.   showInfo "Report Card 2",false
  100.   wait 30
  101.   set the cursor to hand
  102.   autoMouse menuMouse,4,1 -- By Class
  103.   if the result is "Item not found" then -- test for XCMD bug
  104.     send "doMenu By Class" to background "Report Cards"
  105.   end if
  106.   wait 1 second
  107.   autoMouse moveMouse,479,106
  108.   send "mouseUp down" to background button id 19
  109.   wait 30
  110.   autoMouse menuMouse,4,2 -- By Students
  111.   wait 1 second
  112.   autoMouse moveMouse,479,142
  113.   click at the loc of background button id 24
  114.   wait 30
  115.   autoMouse menuMouse,6,7 -- Custom Templates
  116.   wait 1 second
  117.   autoMouse moveMouse,51,197
  118.   click at the loc of card button "Selected items"
  119.   wait 30
  120.   autoMouse moveMouse,279,179
  121.   click at the loc of card button id 10
  122.   wait 30
  123.   autoMouse moveMouse,294,179
  124.   click at the loc of card button id 11
  125.   wait 30
  126.   autoMouse moveMouse,309,179
  127.   click at the loc of card button id 12
  128.   wait 30
  129.   autoMouse moveMouse,325,179
  130.   click at the loc of card button id 13
  131.   wait 30
  132.   autoMouse moveMouse,429,222
  133.   click at the loc of card button id 30
  134.   wait 30
  135.   autoMouse moveMouse,444,222
  136.   click at the loc of card button id 31
  137.   wait 30
  138.   autoMouse moveMouse,82,257
  139.   click at the loc of card button "OK"
  140.   wait 1 second
  141.   autoMouse moveMouse,180,133
  142.   click at the loc of card button "Report Card"
  143.   wait 30
  144.   autoMouse moveMouse,378,200
  145.   click at the loc of card button "Open"
  146.   wait 2 seconds
  147.   autoMouse moveMouse,18,30
  148.   click at the loc of card button "Close"
  149.   showInfo "Honor Roll 1",false
  150.   wait 30
  151.   set the cursor to hand
  152.   autoMouse menuMouse,3,15 -- Honor Roll
  153.   wait 1 second
  154.   autoMouse moveMouse,248,135
  155.   click at the loc of card button id 20
  156.   wait 30
  157.   autoMouse moveMouse,264,135
  158.   click at the loc of card button id 21
  159.   wait 30
  160.   autoMouse moveMouse,195,264
  161.   click at the loc of card button "Scroll Bar"
  162.   wait 30
  163.   autoMouse moveMouse,228,264
  164.   click at the loc of card button "Scroll Bar"
  165.   wait 30
  166.   autoMouse moveMouse,359,136
  167.   click at the loc of card button id 25
  168.   wait 30
  169.   autoMouse moveMouse,447,198
  170.   click at the loc of card button id 37
  171.   wait 30
  172.   autoMouse moveMouse,447,214
  173.   click at the loc of card button id 38
  174.   wait 30
  175.   autoMouse moveMouse,447,230
  176.   click at the loc of card button id 39
  177.   wait 30
  178.   autoMouse moveMouse,447,246
  179.   click at the loc of card button id 40
  180.   wait 1 second
  181.   autoMouse moveMouse,354,38
  182.   click at the loc of card button "Attendance & Marks"
  183.   wait 1 second
  184.   put "Percent" into card field "GPA"
  185.   wait 1 second
  186.   autoMouse moveMouse,196,154
  187.   select text of card field id 14
  188.   type "85.00"
  189.   wait 1 second
  190.   tabKey
  191.   type "100.0"
  192.   wait 30
  193.   autoMouse moveMouse,98,212
  194.   click at the loc of card button "Attendance criteria"
  195.   wait 30
  196.   autoMouse moveMouse,196,243
  197.   select text of card field id 17
  198.   type "2"
  199.   wait 1 second
  200.   tabKey
  201.   type "5.0"
  202.   wait 30
  203.   autoMouse moveMouse,327,269
  204.   click at the loc of card button "Best"
  205.   wait 30
  206.   autoMouse moveMouse,386,270
  207.   select text of card field id 19
  208.   type "5"
  209.   wait 30
  210.   autoMouse moveMouse,229,316
  211.   click at the loc of card button "prefs‚Ķ"
  212.   showInfo "Prefs",true
  213.   wait 1 second
  214.   set the cursor to hand
  215.   wait 30
  216.   autoMouse moveMouse,164,309
  217.   click at the loc of card button "OK"
  218.   showInfo "Honor Roll 2",true
  219.   wait 1 second
  220.   set the cursor to hand
  221.   wait 30
  222.   autoMouse moveMouse,73,315
  223.   click at the loc of card button "OK"
  224.   showInfo "Historical Records",false
  225.   wait 1 second
  226.   set the cursor to hand
  227.   autoMouse moveMouse,182,108
  228.   click at the loc of background button id 9
  229.   send "doMenu Edit Historical Info‚Ķ" to background "Report Cards"
  230.   showInfo "Class Info",true
  231.   wait 1 second
  232.   set the cursor to hand
  233.   autoMouse moveMouse,358,113
  234.   click at the loc of card button "English 12"
  235.   click at the loc of card button "English 12"
  236.   wait 2 seconds
  237.   autoMouse moveMouse,79,315
  238.   click at the loc of card button "OK"
  239.   showInfo "Years",true
  240.   showInfo "Year End",true
  241.   wait 1 second
  242.   set the cursor to hand
  243.   autoMouse moveMouse,109,310
  244.   click at the loc of card button "OK"
  245.   showInfo "Print Options",false
  246.   wait 1 second
  247.   set the cursor to hand
  248.   autoMouse menuMouse,1,1 -- About
  249.   if the result is "Item not found" then -- test for XCMD bug
  250.     send "doMenu About" to background "Report Cards"
  251.   end if
  252. end rollingDemo
  253.  
  254. on showInfo fieldName,cardPict
  255.   lock screen
  256.   set the cursor to none
  257.   restoreMenuBar false
  258.   grayPicture cardPict
  259.   installMenuBar 1120,1121,1122,1123,1124,1125,-204,-205
  260.   show card field fieldName
  261.   unlock screen with dissolve
  262.   put the secs into temp
  263.   repeat until the mouseClick
  264.     if (the secs - temp) > 30 then show card field "Continue"
  265.   end repeat
  266.   lock screen
  267.   hide card field fieldName
  268.   hide card field "Continue"
  269.   pop card
  270.   unlock screen with dissolve
  271.   if the optionKey is down then exit to HyperCard
  272. end showInfo
  273.  
  274.  
  275. -- part contents for background part 5
  276. ----- text -----
  277. Report Cards
  278.  
  279. -- part contents for background part 6
  280. ----- text -----
  281. The Report Cards module summarizes information from CSL Attendance and CSL Marks (including teacher comments). 
  282.  
  283. Full historical transcript information is stored for as many years as the student is in the system. Complete student demographic and academic histories are maintained. Transcripts, honor roles, failing lists, class rank, mailing labels and GPA‚Äôs can be produced at any time. Up to 9 sets of report cards per year can be maintained and mid term report cards can be printed at any time.